From: Thien-Thi Nguyen <ttn@gnuvola.org>
Date: Tue, 27 Mar 2007 14:12:33 +0000 (+0000)
Subject: (message-yank-original): Fix bug:
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~1319
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=f0cf8d1affa69b7d52e276957fca027bb3348466;p=emacs.git

(message-yank-original): Fix bug:
Don't switch point and mark unnecessarily.
---

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 5bbb565dd7f..305d64a9af3 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -3349,7 +3349,8 @@ prefix, and don't delete any headers."
 		   (point)))
       (unless arg
 	(funcall message-cite-function))
-      (message-exchange-point-and-mark)
+      (unless (< (point) (mark-marker))
+        (message-exchange-point-and-mark))
       (unless (bolp)
 	(insert ?\n))
       (unless modified